﻿' ------------------------------------------------------------------------------
' This form prompts the user to overwrite an album's query, or enter a new album
' name for the query.
' ------------------------------------------------------------------------------
' This file is part of the SQL Server 2008 Technology Demonstration. This
' application was designed and coded by Eric Weitzman, LandTime Inc, for
' Microsoft Corporation. Contact Ed Katibah at Microsoft about this demo.
' Copyright © 2008 Microsoft Corporation. All rights reserved.
' ------------------------------------------------------------------------------

Public Class SaveAlbumForm
    Public Property AlbumName() As String
        Get
            Return txtName.Text
        End Get
        Set(ByVal value As String)
            txtName.Text = value
            txtName.SelectAll()
        End Set
    End Property
End Class